! module2.f90
module module2
  use module1
  implicit none
contains
  function multiply(a, b)
    integer, intent(in) :: a, b
    integer :: multiply
    multiply = a * b
  end function multiply
end module module2
